home *** CD-ROM | disk | FTP | other *** search
- DB(Level%, 1).Code = 1
- DB(Level%, 1).Y = 0
- DB(Level%, 1).X = 0
- DB(Level%, 1).Height = 22
- DB(Level%, 1).Wdth = 65
- DB(Level%, 1).BorderType = 1
- DB(Level%, 1).PrimaryColor = -c1
- DB(Level%, 1).WindowColor = -c1
- DB(Level%, 1).Text = "List Boxes"
- DB(Level%, 1).TextColor = c2
- DB(Level%, 1).SecondaryColor = c1
-
- LB(1).Text = "The list box allows you to present items in a window."
- LB(2).Text = "These items may be scrolled by the user. Several types"
- LB(3).Text = "of list box may be created. This text window is a list"
- LB(4).Text = "box! Two other types are show below. The box on the"
- LB(5).Text = "left mocks all available drives; the other mocks avail-"
- LB(6).Text = "able files. List boxes may have optional bottom or right"
- LB(7).Text = "scroll bars, and they and their contents may be any size."
- LB(8).Text = "Items may be linked to another dialog box element. A"
- LB(9).Text = "selected item may be printed anywhere on the screen"
- LB(10).Text = "and the selected item may be embedded in a context-"
- LB(11).Text = "sensitive sentence link."
- LB(12).Text = " "
- LB(13).Text = "For example, the list box to the left uses the text-box"
- LB(14).Text = "link. This link allows either manual or automatic"
- LB(15).Text = "entry of the drive name into the text box. The list box "
- LB(16).Text = "to the right uses the sentence link. Sentence links"
- LB(17).Text = "allow a list box item to appear in a sentence somewhere"
- LB(18).Text = "on the screen. Here, the sentence appears right below "
- LB(19).Text = "the list box."
- LB(20).Text = ""
- LB(21).Text = "Once you tab to a list box try experimenting with the"
- LB(22).Text = "fully-operational diectional keys. If you type the first"
- LB(23).Text = "character of a list box item then the cursor will search"
- LB(24).Text = "and highlight the next item which matches. The mouse"
- LB(25).Text = "may be used to select items, to operate the scroll bars"
- LB(26).Text = "directly, or even to double click on an item to be"
- LB(27).Text = "selected."
- LB(28).Text = "[A:]"
- LB(29).Text = "[B:]"
- LB(30).Text = "[C:]"
- LB(31).Text = "[D:]"
- LB(32).Text = "[E:]"
- LB(33).Text = "[F:]"
- LB(34).Text = "[G:]"
- LB(35).Text = "[H:]"
- LB(36).Text = ",BC.EXE, is the QuickBASIC compiler."
- LB(37).Text = ",BCOM45.LIB, is used in linking."
- LB(38).Text = "The file~,BQLB45.QLB, creates a QuickLibrary."
- LB(39).Text = "A great QuickLibrary:~,DIALOGIC.QLB,"
- LB(40).Text = ",LINK.EXE, is a linker."
- LB(41).Text = "You should try~,MASM.EXE,."
- LB(42).Text = ",DIALOGIC.LIB, Register to get this one!."
- LB(43).Text = ",WP, WordPerfect 5.1."
- LB(44).Text = ",LADDER, Compay Ladder"
- LB(45).Text = ",DEMO2.EXE, Dan Briklin's Demo Program."
- LB(46).Text = ",DEAR.001, is Letter 1."
- LB(47).Text = ",DEAR.002, is Letter 2."
- LB(48).Text = ",DEAR.003, is Letter 3."
- LB(49).Text = ",DEAR.004, is Letter 4."
- LB(50).Text = ",DEAR.005, is Letter 5."
- LB(51).Text = ",DEAR.006, is Letter 6."
- LB(52).Text = ",DEAR.007, is Letter 7."
- LB(53).Text = ",DEAR.008, is Letter 8."
- LB(54).Text = ",DEAR.009, is Letter 9."
- LB(55).Text = ",DEAR.010, is Letter 10."
-
- DB(Level%, 2).Code = 3
- DB(Level%, 2).Y = 2
- DB(Level%, 2).X = 2
- DB(Level%, 2).Height = 6
- DB(Level%, 2).Wdth = 1
- DB(Level%, 2).WindowColor = c1
- DB(Level%, 2).PrimaryColor = c1
- DB(Level%, 2).SecondaryColor = c2
- DB(Level%, 2).SelectedColor = -1
- DB(Level%, 2).StarColor = c1
- DB(Level%, 2).ItemLength = 60
- DB(Level%, 2).KeyColor = 0
- DB(Level%, 2).BorderType = 2
- DB(Level%, 2).Link = 0
- DB(Level%, 2).TextY = 0
- DB(Level%, 2).TextX = 0
- DB(Level%, 2).TextColor = c1
- DB(Level%, 2).NumberOne = 1
- DB(Level%, 2).NumberTwo = 27
- DB(Level%, 2).Default = 1
-
- DB(Level%, 3).Code = 3
- DB(Level%, 3).Y = 10
- DB(Level%, 3).X = 3
- DB(Level%, 3).Height = 5
- DB(Level%, 3).Wdth = 1
- DB(Level%, 3).WindowColor = c1
- DB(Level%, 3).PrimaryColor = c1
- DB(Level%, 3).SecondaryColor = c2
- DB(Level%, 3).SelectedColor = c3
- DB(Level%, 3).StarColor = c1
- DB(Level%, 3).ItemLength = 9
- DB(Level%, 3).KeyColor = 0
- DB(Level%, 3).BorderType = 2
- DB(Level%, 3).Link = 0
- DB(Level%, 3).TextY = 0
- DB(Level%, 3).TextX = 0
- DB(Level%, 3).TextColor = c1
- DB(Level%, 3).NumberOne = 28
- DB(Level%, 3).NumberTwo = 35
- DB(Level%, 3).Default = 0
- DB(Level%, 3).Link = 5
-
- DB(Level%, 4).Code = 3
- DB(Level%, 4).Y = 10
- DB(Level%, 4).X = 19
- DB(Level%, 4).Height = 5
- DB(Level%, 4).Wdth = 3
- DB(Level%, 4).WindowColor = c1
- DB(Level%, 4).PrimaryColor = c1
- DB(Level%, 4).SecondaryColor = c2
- DB(Level%, 4).SelectedColor = c3
- DB(Level%, 4).StarColor = c1
- DB(Level%, 4).ItemLength = 12
- DB(Level%, 4).KeyColor = 2
- DB(Level%, 4).BorderType = 1
- DB(Level%, 4).Link = -1
- DB(Level%, 4).TextY = 18
- DB(Level%, 4).TextX = 20
- DB(Level%, 4).TextColor = c1
- DB(Level%, 4).NumberOne = 36
- DB(Level%, 4).NumberTwo = 55
- DB(Level%, 4).Default = 0
-
- DB(Level%, 5).Code = 2
- DB(Level%, 5).Y = 17
- DB(Level%, 5).X = 3
- DB(Level%, 5).Wdth = 10
- DB(Level%, 5).BorderType = 1
- DB(Level%, 5).PrimaryColor = c1
- DB(Level%, 5).WindowColor = c1
- DB(Level%, 5).SelectedColor = c3
- DB(Level%, 5).TextY = 18
- DB(Level%, 5).TextX = 3
- DB(Level%, 5).Text = ""
- DB(Level%, 5).TextColor = c1
- DB(Level%, 5).KeyColor = c4
- DB(Level%, 5).TextString = ""
- DB(Level%, 5).ItemLength = 5
-
- DB(Level%, 6).Code = 7
- DB(Level%, 6).Y = 21
- DB(Level%, 6).X = 30
- DB(Level%, 6).Text = "~OK"
- DB(Level%, 6).PrimaryColor = c1
- DB(Level%, 6).WindowColor = c1
- DB(Level%, 6).SelectedColor = c3
- DB(Level%, 6).KeyColor = c4
- DB(Level%, 6).SecondaryColor = c4
- DB(Level%, 6).Default = -1
- DB(Level%, 6).TextString = CHR$(13)
-
- DB(Level%, 7).Code = 0
-
-